home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / commodore-users-of-norman / CUON_20_(11-1984).d64 / c_g board 3 (.txt) < prev    next >
Commodore BASIC  |  2019-04-13  |  198b  |  10 lines
  1. 10 REM CREATE RELATIVE MESSAGE FILE
  2. 20 OPEN15,8,15:OPEN1,8,2,"MSGFILE1,L,"+CHR$(254)
  3. 30 PRINT#15,"P"+CHR$(98)+CHR$(145)+CHR$(1)+CHR$(1)
  4. 40 PRINT#1,"@END"
  5. 50 CLOSE1:CLOSE15
  6. 60 END
  7. 65 OPEN15,8,15
  8. 70 INPUT#15,A$,B$,C$,D$:PRINTA$;B$;C$;D$
  9. 80 END
  10.